object PolyEditDlg: TPolyEditDlg Left = 281 Top = 142 ActiveControl = EditX BorderStyle = bsDialog Caption = 'Polygon' ClientHeight = 249 ClientWidth = 337 Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 224 Top = 20 Width = 7 Height = 13 Caption = '&X' FocusControl = EditX end object Label2: TLabel Left = 224 Top = 44 Width = 7 Height = 13 Caption = '&Y' FocusControl = EditY end object ListBox: TListBox Left = 8 Top = 8 Width = 161 Height = 193 ItemHeight = 16 Items.Strings = ( ' ') Style = lbOwnerDrawFixed TabOrder = 0 OnDrawItem = ListBoxDrawItem end object EditX: TEdit Left = 240 Top = 16 Width = 89 Height = 21 TabOrder = 1 end object EditY: TEdit Left = 240 Top = 40 Width = 89 Height = 21 TabOrder = 2 end object BtnAdd: TBitBtn Left = 176 Top = 16 Width = 25 Height = 25 Caption = '<=' Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Fixedsys' Font.Style = [fsBold] ParentFont = False TabOrder = 3 OnClick = BtnAddClick end object BtnDel: TBitBtn Left = 176 Top = 48 Width = 25 Height = 25 Caption = '=>' Font.Charset = RUSSIAN_CHARSET Font.Color = clWindowText Font.Height = -15 Font.Name = 'Fixedsys' Font.Style = [fsBold] ParentFont = False TabOrder = 4 OnClick = BtnDelClick end object BtnUp: TBitBtn Left = 176 Top = 144 Width = 25 Height = 25 TabOrder = 5 OnClick = BtnUpClick Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333 3333333333090333333333333309033333333333330903333333333333090333 3333333333090333333333300009000033333330999999903333333309999903 3333333309999903333333333099903333333333309990333333333333090333 3333333333090333333333333330333333333333333033333333} end object BtnDown: TBitBtn Left = 176 Top = 176 Width = 25 Height = 25 TabOrder = 6 OnClick = BtnDownClick Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 0400000000008000000000000000000000001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333 3333333333303333333333333309033333333333330903333333333330999033 3333333330999033333333330999990333333333099999033333333099999990 3333333000090000333333333309033333333333330903333333333333090333 3333333333090333333333333309033333333333330003333333} end object RGroupF: TRadioGroup Left = 232 Top = 136 Width = 97 Height = 65 Caption = 'Fill Mode' Items.Strings = ( '&Alternate' '&Winding') TabOrder = 7 end object BtnOK: TBitBtn Left = 88 Top = 216 Width = 75 Height = 25 Caption = '&OK' TabOrder = 8 OnClick = BtnOKClick Glyph.Data = { DE010000424DDE01000000000000760000002800000024000000120000000100 0400000000006801000000000000000000001000000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333330000333333333333333333333333F33333333333 00003333344333333333333333388F3333333333000033334224333333333333 338338F3333333330000333422224333333333333833338F3333333300003342 222224333333333383333338F3333333000034222A22224333333338F338F333 8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224 33333338F83338F338F33333000033A33333A222433333338333338F338F3333 0000333333333A222433333333333338F338F33300003333333333A222433333 333333338F338F33000033333333333A222433333333333338F338F300003333 33333333A222433333333333338F338F00003333333333333A22433333333333 3338F38F000033333333333333A223333333333333338F830000333333333333 333A333333333333333338330000333333333333333333333333333333333333 0000} NumGlyphs = 2 end object BtnCancel: TBitBtn Left = 176 Top = 216 Width = 75 Height = 25 TabOrder = 9 Kind = bkCancel end end